home *** CD-ROM | disk | FTP | other *** search
Text File | 1998-08-17 | 18.6 KB | 501 lines | [TEXT/MPS ] |
- {
- File: PPCToolbox.p
-
- Contains: Program-Program Communications Toolbox Interfaces.
-
- Version: Technology: System 7.5
- Release: Universal Interfaces 3.2
-
- Copyright: © 1989-1993, 1995-1998 by Apple Computer, Inc., all rights reserved
-
- Bugs?: For bug reports, consult the following page on
- the World Wide Web:
-
- http://developer.apple.com/bugreporter/
-
- }
- {$IFC UNDEFINED UsingIncludes}
- {$SETC UsingIncludes := 0}
- {$ENDC}
-
- {$IFC NOT UsingIncludes}
- UNIT PPCToolbox;
- INTERFACE
- {$ENDC}
-
- {$IFC UNDEFINED __PPCTOOLBOX__}
- {$SETC __PPCTOOLBOX__ := 1}
-
- {$I+}
- {$SETC PPCToolboxIncludes := UsingIncludes}
- {$SETC UsingIncludes := 1}
-
- {$IFC UNDEFINED __MACTYPES__}
- {$I MacTypes.p}
- {$ENDC}
- {$IFC UNDEFINED __APPLETALK__}
- {$I AppleTalk.p}
- {$ENDC}
-
-
- {$PUSH}
- {$ALIGN MAC68K}
- {$LibExport+}
-
-
- TYPE
- PPCServiceType = UInt8;
-
- CONST
- ppcServiceRealTime = 1;
-
-
- TYPE
- PPCLocationKind = INTEGER;
-
- CONST
- ppcNoLocation = 0; { There is no PPCLocName }
- ppcNBPLocation = 1; { Use AppleTalk NBP }
- ppcNBPTypeLocation = 2; { Used for specifying a location name type during PPCOpen only }
-
-
- TYPE
- PPCPortKinds = INTEGER;
-
- CONST
- ppcByCreatorAndType = 1; { Port type is specified as colloquial Mac creator and type }
- ppcByString = 2; { Port type is in pascal string format }
-
- { Values returned for request field in PPCInform call }
-
- TYPE
- PPCSessionOrigin = UInt8;
-
- CONST
- { Values returned for requestType field in PPCInform call }
- ppcLocalOrigin = 1; { session originated from this machine }
- ppcRemoteOrigin = 2; { session originated from remote machine }
-
-
- TYPE
- PPCPortRefNum = INTEGER;
- PPCSessRefNum = LONGINT;
- PPCPortRecPtr = ^PPCPortRec;
- PPCPortRec = RECORD
- nameScript: ScriptCode; { script of name }
- name: Str32Field; { name of port as seen in browser }
- portKindSelector: PPCPortKinds; { which variant }
- CASE INTEGER OF
- 0: (
- portTypeStr: Str32; { pascal type string }
- );
- 1: (
- portCreator: OSType;
- portType: OSType;
- );
- END;
-
- PPCPortPtr = ^PPCPortRec;
- LocationNameRecPtr = ^LocationNameRec;
- LocationNameRec = RECORD
- locationKindSelector: PPCLocationKind; { which variant }
- CASE INTEGER OF
- 0: (
- nbpEntity: EntityName; { NBP name entity }
- );
- 1: (
- nbpType: Str32; { just the NBP type string, for PPCOpen }
- );
- END;
-
- LocationNamePtr = ^LocationNameRec;
- PortInfoRecPtr = ^PortInfoRec;
- PortInfoRec = RECORD
- filler1: SInt8;
- authRequired: BOOLEAN;
- name: PPCPortRec;
- END;
-
- PortInfoPtr = ^PortInfoRec;
- PortInfoArrayPtr = ^PortInfoRec;
- PPCParamBlockRecPtr = ^PPCParamBlockRec;
- PPCParamBlockPtr = ^PPCParamBlockRec;
- {$IFC TYPED_FUNCTION_POINTERS}
- PPCCompProcPtr = PROCEDURE(pb: PPCParamBlockPtr);
- {$ELSEC}
- PPCCompProcPtr = ProcPtr;
- {$ENDC}
-
- PPCCompUPP = UniversalProcPtr;
- PPCOpenPBRecPtr = ^PPCOpenPBRec;
- PPCOpenPBRec = PACKED RECORD
- qLink: Ptr; { PPC's Internal Use }
- csCode: UInt16; { Requested PPC command }
- intUse: UInt16; { Internal Use }
- intUsePtr: Ptr; { Internal Use }
- ioCompletion: PPCCompUPP; { 12 --> Completion Routine }
- ioResult: OSErr; { 16 <-- Command Result Code }
- Reserved: ARRAY [0..4] OF UInt32; { Reserved for PPC, Don't use }
- portRefNum: PPCPortRefNum; { 38 <-- Port Reference }
- filler1: LONGINT;
- serviceType: PPCServiceType; { 44 --> Bit field describing the requested port service }
- resFlag: UInt8; { Must be set to 0 }
- portName: PPCPortPtr; { 46 --> PortName for PPC }
- locationName: LocationNamePtr; { 50 --> If NBP Registration is required }
- networkVisible: BOOLEAN; { 54 --> make this network visible on network }
- nbpRegistered: BOOLEAN; { 55 <-- The given location name was registered on the network }
- END;
-
- PPCOpenPBPtr = ^PPCOpenPBRec;
- PPCInformPBRecPtr = ^PPCInformPBRec;
- PPCInformPBRec = PACKED RECORD
- qLink: Ptr; { PPC's Internal Use }
- csCode: UInt16; { Requested PPC command }
- intUse: UInt16; { Internal Use }
- intUsePtr: Ptr; { Internal Use }
- ioCompletion: PPCCompUPP; { 12 --> Completion Routine }
- ioResult: OSErr; { 16 <-- Command Result Code }
- Reserved: ARRAY [0..4] OF UInt32; { Reserved for PPC, Don't use }
- portRefNum: PPCPortRefNum; { 38 --> Port Identifier }
- sessRefNum: PPCSessRefNum; { 40 <-- Session Reference }
- serviceType: PPCServiceType; { 44 <-- Status Flags for type of session, local, remote }
- autoAccept: BOOLEAN; { 45 --> if true session will be accepted automatically }
- portName: PPCPortPtr; { 46 --> Buffer for Source PPCPortRec }
- locationName: LocationNamePtr; { 50 --> Buffer for Source LocationNameRec }
- userName: StringPtr; { 54 --> Buffer for Soure user's name trying to link. }
- userData: UInt32; { 58 <-- value included in PPCStart's userData }
- requestType: PPCSessionOrigin; { 62 <-- Local or Network }
- filler: SInt8;
- END;
-
- PPCInformPBPtr = ^PPCInformPBRec;
- PPCStartPBRecPtr = ^PPCStartPBRec;
- PPCStartPBRec = PACKED RECORD
- qLink: Ptr; { PPC's Internal Use }
- csCode: UInt16; { Requested PPC command }
- intUse: UInt16; { Internal Use }
- intUsePtr: Ptr; { Internal Use }
- ioCompletion: PPCCompUPP; { 12 --> Completion Routine }
- ioResult: OSErr; { 16 <-- Command Result Code }
- Reserved: ARRAY [0..4] OF UInt32; { Reserved for PPC, Don't use }
- portRefNum: PPCPortRefNum; { 38 --> Port Identifier }
- sessRefNum: PPCSessRefNum; { 40 <-- Session Reference }
- serviceType: PPCServiceType; { 44 <-- Actual service method (realTime) }
- resFlag: UInt8; { 45 --> Must be set to 0 }
- portName: PPCPortPtr; { 46 --> Destination portName }
- locationName: LocationNamePtr; { 50 --> NBP or NAS style service location name }
- rejectInfo: UInt32; { 54 <-- reason for rejecting the session request }
- userData: UInt32; { 58 --> Copied to destination PPCInform parameter block }
- userRefNum: UInt32; { 62 --> userRefNum (obtained during login process) }
- END;
-
- PPCStartPBPtr = ^PPCStartPBRec;
- PPCAcceptPBRecPtr = ^PPCAcceptPBRec;
- PPCAcceptPBRec = RECORD
- qLink: Ptr; { PPC's Internal Use }
- csCode: UInt16; { Requested PPC command }
- intUse: UInt16; { Internal Use }
- intUsePtr: Ptr; { Internal Use }
- ioCompletion: PPCCompUPP; { 12 --> Completion Routine }
- ioResult: OSErr; { 16 <-- Command Result Code }
- Reserved: ARRAY [0..4] OF UInt32; { Reserved for PPC, Don't use }
- filler1: INTEGER;
- sessRefNum: PPCSessRefNum; { 40 --> Session Reference }
- END;
-
- PPCAcceptPBPtr = ^PPCAcceptPBRec;
- PPCRejectPBRecPtr = ^PPCRejectPBRec;
- PPCRejectPBRec = RECORD
- qLink: Ptr; { PPC's Internal Use }
- csCode: UInt16; { Requested PPC command }
- intUse: UInt16; { Internal Use }
- intUsePtr: Ptr; { Internal Use }
- ioCompletion: PPCCompUPP; { 12 --> Completion Routine }
- ioResult: OSErr; { 16 <-- Command Result Code }
- Reserved: ARRAY [0..4] OF UInt32; { Reserved for PPC, Don't use }
- filler1: INTEGER;
- sessRefNum: PPCSessRefNum; { 40 --> Session Reference }
- filler2: INTEGER;
- filler3: LONGINT;
- filler4: LONGINT;
- rejectInfo: UInt32; { 54 --> reason for rejecting the session request }
- END;
-
- PPCRejectPBPtr = ^PPCRejectPBRec;
- PPCWritePBRecPtr = ^PPCWritePBRec;
- PPCWritePBRec = RECORD
- qLink: Ptr; { PPC's Internal Use }
- csCode: UInt16; { Requested PPC command }
- intUse: UInt16; { Internal Use }
- intUsePtr: Ptr; { Internal Use }
- ioCompletion: PPCCompUPP; { 12 --> Completion Routine }
- ioResult: OSErr; { 16 <-- Command Result Code }
- Reserved: ARRAY [0..4] OF UInt32; { Reserved for PPC, Don't use }
- filler1: INTEGER;
- sessRefNum: PPCSessRefNum; { 40 --> Session Reference }
- bufferLength: Size; { 44 --> Length of the message buffer }
- actualLength: Size; { 48 <-- Actual Length Written }
- bufferPtr: Ptr; { 52 --> Pointer to message buffer }
- more: BOOLEAN; { 56 --> if more data in this block will be written }
- filler2: SInt8;
- userData: UInt32; { 58 --> Message block userData Uninterpreted by PPC }
- blockCreator: OSType; { 62 --> Message block creator Uninterpreted by PPC }
- blockType: OSType; { 66 --> Message block type Uninterpreted by PPC }
- END;
-
- PPCWritePBPtr = ^PPCWritePBRec;
- PPCReadPBRecPtr = ^PPCReadPBRec;
- PPCReadPBRec = RECORD
- qLink: Ptr; { PPC's Internal Use }
- csCode: UInt16; { Requested PPC command }
- intUse: UInt16; { Internal Use }
- intUsePtr: Ptr; { Internal Use }
- ioCompletion: PPCCompUPP; { 12 --> Completion Routine }
- ioResult: OSErr; { 16 <-- Command Result Code }
- Reserved: ARRAY [0..4] OF UInt32; { Reserved for PPC, Don't use }
- filler1: INTEGER;
- sessRefNum: PPCSessRefNum; { 40 --> Session Reference }
- bufferLength: Size; { 44 --> Length of the message buffer }
- actualLength: Size; { 48 <-- Actual length read }
- bufferPtr: Ptr; { 52 --> Pointer to message buffer }
- more: BOOLEAN; { 56 <-- if true more data in this block to be read }
- filler2: SInt8;
- userData: UInt32; { 58 <-- Message block userData Uninterpreted by PPC }
- blockCreator: OSType; { 62 <-- Message block creator Uninterpreted by PPC }
- blockType: OSType; { 66 <-- Message block type Uninterpreted by PPC }
- END;
-
- PPCReadPBPtr = ^PPCReadPBRec;
- PPCEndPBRecPtr = ^PPCEndPBRec;
- PPCEndPBRec = RECORD
- qLink: Ptr; { PPC's Internal Use }
- csCode: UInt16; { Requested PPC command }
- intUse: UInt16; { Internal Use }
- intUsePtr: Ptr; { Internal Use }
- ioCompletion: PPCCompUPP; { 12 --> Completion Routine }
- ioResult: OSErr; { 16 <-- Command Result Code }
- Reserved: ARRAY [0..4] OF UInt32; { Reserved for PPC, Don't use }
- filler1: INTEGER;
- sessRefNum: PPCSessRefNum; { 40 --> Session Reference }
- END;
-
- PPCEndPBPtr = ^PPCEndPBRec;
- PPCClosePBRecPtr = ^PPCClosePBRec;
- PPCClosePBRec = RECORD
- qLink: Ptr; { PPC's Internal Use }
- csCode: UInt16; { Requested PPC command }
- intUse: UInt16; { Internal Use }
- intUsePtr: Ptr; { Internal Use }
- ioCompletion: PPCCompUPP; { 12 --> Completion Routine }
- ioResult: OSErr; { 16 <-- Command Result Code }
- Reserved: ARRAY [0..4] OF UInt32; { Reserved for PPC, Don't use }
- portRefNum: PPCPortRefNum; { 38 --> Port Identifier }
- END;
-
- PPCClosePBPtr = ^PPCClosePBRec;
- IPCListPortsPBRecPtr = ^IPCListPortsPBRec;
- IPCListPortsPBRec = RECORD
- qLink: Ptr; { PPC's Internal Use }
- csCode: UInt16; { Requested PPC command }
- intUse: UInt16; { Internal Use }
- intUsePtr: Ptr; { Internal Use }
- ioCompletion: PPCCompUPP; { 12 --> Completion Routine }
- ioResult: OSErr; { 16 <-- Command Result Code }
- Reserved: ARRAY [0..4] OF UInt32; { Reserved for PPC, Don't use }
- filler1: INTEGER;
- startIndex: UInt16; { 40 --> Start Index }
- requestCount: UInt16; { 42 --> Number of entries to be returned }
- actualCount: UInt16; { 44 <-- Actual Number of entries to be returned }
- portName: PPCPortPtr; { 46 --> PortName Match }
- locationName: LocationNamePtr; { 50 --> NBP or NAS type name to locate the Port Location }
- bufferPtr: PortInfoArrayPtr; { 54 --> Pointer to a buffer requestCount*sizeof(PortInfo) bytes big }
- END;
-
- IPCListPortsPBPtr = ^IPCListPortsPBRec;
- PPCParamBlockRec = RECORD
- CASE INTEGER OF
- 0: (
- openParam: PPCOpenPBRec;
- );
- 1: (
- informParam: PPCInformPBRec;
- );
- 2: (
- startParam: PPCStartPBRec;
- );
- 3: (
- acceptParam: PPCAcceptPBRec;
- );
- 4: (
- rejectParam: PPCRejectPBRec;
- );
- 5: (
- writeParam: PPCWritePBRec;
- );
- 6: (
- readParam: PPCReadPBRec;
- );
- 7: (
- endParam: PPCEndPBRec;
- );
- 8: (
- closeParam: PPCClosePBRec;
- );
- 9: (
- listPortsParam: IPCListPortsPBRec;
- );
- END;
-
- { PPC Calling Conventions }
- FUNCTION PPCInit: OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $7000, $A0DD, $3E80;
- {$ENDC}
-
- FUNCTION PPCOpenSync(pb: PPCOpenPBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7001, $A0DD, $3E80;
- {$ENDC}
- FUNCTION PPCOpenAsync(pb: PPCOpenPBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7001, $A4DD, $3E80;
- {$ENDC}
- FUNCTION PPCInformSync(pb: PPCInformPBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7003, $A0DD, $3E80;
- {$ENDC}
- FUNCTION PPCInformAsync(pb: PPCInformPBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7003, $A4DD, $3E80;
- {$ENDC}
- FUNCTION PPCStartSync(pb: PPCStartPBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7002, $A0DD, $3E80;
- {$ENDC}
- FUNCTION PPCStartAsync(pb: PPCStartPBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7002, $A4DD, $3E80;
- {$ENDC}
- FUNCTION PPCAcceptSync(pb: PPCAcceptPBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7004, $A0DD, $3E80;
- {$ENDC}
- FUNCTION PPCAcceptAsync(pb: PPCAcceptPBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7004, $A4DD, $3E80;
- {$ENDC}
- FUNCTION PPCRejectSync(pb: PPCRejectPBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7005, $A0DD, $3E80;
- {$ENDC}
- FUNCTION PPCRejectAsync(pb: PPCRejectPBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7005, $A4DD, $3E80;
- {$ENDC}
- FUNCTION PPCWriteSync(pb: PPCWritePBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7006, $A0DD, $3E80;
- {$ENDC}
- FUNCTION PPCWriteAsync(pb: PPCWritePBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7006, $A4DD, $3E80;
- {$ENDC}
- FUNCTION PPCReadSync(pb: PPCReadPBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7007, $A0DD, $3E80;
- {$ENDC}
- FUNCTION PPCReadAsync(pb: PPCReadPBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7007, $A4DD, $3E80;
- {$ENDC}
- FUNCTION PPCEndSync(pb: PPCEndPBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7008, $A0DD, $3E80;
- {$ENDC}
- FUNCTION PPCEndAsync(pb: PPCEndPBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7008, $A4DD, $3E80;
- {$ENDC}
- FUNCTION PPCCloseSync(pb: PPCClosePBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7009, $A0DD, $3E80;
- {$ENDC}
- FUNCTION PPCCloseAsync(pb: PPCClosePBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $7009, $A4DD, $3E80;
- {$ENDC}
- FUNCTION IPCListPortsSync(pb: IPCListPortsPBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $700A, $A0DD, $3E80;
- {$ENDC}
- FUNCTION IPCListPortsAsync(pb: IPCListPortsPBPtr): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $700A, $A4DD, $3E80;
- {$ENDC}
- FUNCTION DeleteUserIdentity(userRef: UInt32): OSErr;
- FUNCTION GetDefaultUser(VAR userRef: UInt32; VAR userName: Str32): OSErr;
- FUNCTION StartSecureSession(pb: PPCStartPBPtr; VAR userName: Str32; useDefault: BOOLEAN; allowGuest: BOOLEAN; VAR guestSelected: BOOLEAN; prompt: Str255): OSErr;
-
- TYPE
- {$IFC TYPED_FUNCTION_POINTERS}
- PPCFilterProcPtr = FUNCTION(name: LocationNamePtr; port: PortInfoPtr): BOOLEAN;
- {$ELSEC}
- PPCFilterProcPtr = ProcPtr;
- {$ENDC}
-
- PPCFilterUPP = UniversalProcPtr;
-
- CONST
- uppPPCCompProcInfo = $000000C0;
- uppPPCFilterProcInfo = $000003D0;
-
- FUNCTION NewPPCCompProc(userRoutine: PPCCompProcPtr): PPCCompUPP;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $2E9F;
- {$ENDC}
-
- FUNCTION NewPPCFilterProc(userRoutine: PPCFilterProcPtr): PPCFilterUPP;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $2E9F;
- {$ENDC}
-
- PROCEDURE CallPPCCompProc(pb: PPCParamBlockPtr; userRoutine: PPCCompUPP);
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $4E90;
- {$ENDC}
-
- FUNCTION CallPPCFilterProc(name: LocationNamePtr; port: PortInfoPtr; userRoutine: PPCFilterUPP): BOOLEAN;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $205F, $4E90;
- {$ENDC}
- FUNCTION PPCBrowser(prompt: Str255; applListLabel: Str255; defaultSpecified: BOOLEAN; VAR theLocation: LocationNameRec; VAR thePortInfo: PortInfoRec; portFilter: PPCFilterUPP; theLocNBPType: Str32): OSErr;
- {$IFC TARGET_OS_MAC AND TARGET_CPU_68K AND NOT TARGET_RT_MAC_CFM}
- INLINE $303C, $0D00, $A82B;
- {$ENDC}
-
- {
- The ParamBlock calls with the "Sync" or "Async" suffix are being phased out.
- }
- FUNCTION PPCOpen(pb: PPCOpenPBPtr; async: BOOLEAN): OSErr;
- FUNCTION PPCInform(pb: PPCInformPBPtr; async: BOOLEAN): OSErr;
- FUNCTION PPCStart(pb: PPCStartPBPtr; async: BOOLEAN): OSErr;
- FUNCTION PPCAccept(pb: PPCAcceptPBPtr; async: BOOLEAN): OSErr;
- FUNCTION PPCReject(pb: PPCRejectPBPtr; async: BOOLEAN): OSErr;
- FUNCTION PPCWrite(pb: PPCWritePBPtr; async: BOOLEAN): OSErr;
- FUNCTION PPCRead(pb: PPCReadPBPtr; async: BOOLEAN): OSErr;
- FUNCTION PPCEnd(pb: PPCEndPBPtr; async: BOOLEAN): OSErr;
- FUNCTION PPCClose(pb: PPCClosePBPtr; async: BOOLEAN): OSErr;
- FUNCTION IPCListPorts(pb: IPCListPortsPBPtr; async: BOOLEAN): OSErr;
-
-
- {$ALIGN RESET}
- {$POP}
-
- {$SETC UsingIncludes := PPCToolboxIncludes}
-
- {$ENDC} {__PPCTOOLBOX__}
-
- {$IFC NOT UsingIncludes}
- END.
- {$ENDC}
-